home *** CD-ROM | disk | FTP | other *** search
- object Form1: TForm1
- Left = 200
- Top = 99
- Width = 511
- Height = 394
- Caption = 'Text File Index Utility'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clBlack
- Font.Height = -12
- Font.Name = 'Arial'
- Font.Style = []
- PixelsPerInch = 96
- TextHeight = 15
- object Label7: TLabel
- Left = 107
- Top = 88
- Width = 78
- Height = 15
- Caption = 'Field &Lengths:'
- FocusControl = ListBox2
- end
- object Label4: TLabel
- Left = 204
- Top = 324
- Width = 293
- Height = 33
- Alignment = taCenter
- AutoSize = False
- Caption =
- 'This method indexes a file based on the selected area in the mem' +
- 'o.'
- WordWrap = True
- end
- object Label1: TLabel
- Left = 12
- Top = 88
- Width = 65
- Height = 15
- Caption = 'File &Offsets:'
- FocusControl = ListBox1
- end
- object Panel1: TPanel
- Left = 0
- Top = 0
- Width = 503
- Height = 81
- Align = alTop
- BevelOuter = bvNone
- TabOrder = 0
- object Label2: TLabel
- Left = 8
- Top = 0
- Width = 55
- Height = 15
- Caption = 'Form File:'
- end
- object Label3: TLabel
- Left = 72
- Top = 0
- Width = 38
- Height = 15
- Caption = 'Label3'
- end
- object Bevel1: TBevel
- Left = 6
- Top = 16
- Width = 489
- Height = 9
- Shape = bsTopLine
- end
- object BitBtn2: TBitBtn
- Left = 8
- Top = 24
- Width = 73
- Height = 49
- Caption = '&Pick File'
- TabOrder = 0
- OnClick = BitBtn2Click
- Glyph.Data = {
- 66010000424D6601000000000000760000002800000014000000140000000100
- 040000000000F000000000000000000000001000000010000000000000000000
- BF0000BF000000BFBF00BF000000BF00BF00BFBF0000C0C0C000808080000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
- 33333333000030000000000000333333000030788888888880333333000030F7
- 7777777780333333000030F99777777780333333000030FFFFFFFFFF70333333
- 0000300000000000003333330000333333333333333333330000333003333333
- 3333333300003330033333333333333300003330033333300000000300003330
- 03303330FFFFFF030000333008300330F4444F030000333800000030FFFFFF03
- 0000333380000030F4444F030000333333300330FFFFFF030000333333303330
- F44F00030000333333333330FFFF003300003333333333300000033300003333
- 33333333333333330000}
- Layout = blGlyphTop
- end
- object BitBtn1: TBitBtn
- Left = 168
- Top = 24
- Width = 73
- Height = 49
- Caption = '&Write'
- TabOrder = 1
- OnClick = BitBtn1Click
- Glyph.Data = {
- F6000000424DF600000000000000760000002800000010000000100000000100
- 0400000000008000000000000000000000001000000010000000000000008000
- 0000008000008080000000008000800080000080800080808000C0C0C000FF00
- 000000FF0000FFFF00000000FF00FF00FF0000FFFF00FFFFFF00666667777777
- 766666660000000076666666000AA0007666666600AAAA0076666666000AA000
- 766666660000000076666666000E80007666666600E10E007666666600088000
- 766666660000000076666666004C440076666666044444C0766666660C444440
- 766666660044C400766666660000000066666666666666666666}
- Layout = blGlyphTop
- end
- object BitBtn3: TBitBtn
- Left = 248
- Top = 24
- Width = 73
- Height = 49
- Caption = '&Clear'
- TabOrder = 2
- OnClick = BitBtn3Click
- Glyph.Data = {
- 76010000424D7601000000000000760000002800000020000000100000000100
- 04000000000000010000120B0000120B00001000000000000000000000000000
- 800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00500005000555
- 555557777F777555F55500000000555055557777777755F75555005500055055
- 555577F5777F57555555005550055555555577FF577F5FF55555500550050055
- 5555577FF77577FF555555005050110555555577F757777FF555555505099910
- 555555FF75777777FF555005550999910555577F5F77777775F5500505509990
- 3055577F75F77777575F55005055090B030555775755777575755555555550B0
- B03055555F555757575755550555550B0B335555755555757555555555555550
- BBB35555F55555575F555550555555550BBB55575555555575F5555555555555
- 50BB555555555555575F555555555555550B5555555555555575}
- Layout = blGlyphTop
- NumGlyphs = 2
- end
- object BitBtn4: TBitBtn
- Left = 328
- Top = 24
- Width = 73
- Height = 49
- Caption = '&Test'
- TabOrder = 3
- OnClick = BitBtn4Click
- Glyph.Data = {
- 06020000424D0602000000000000760000002800000028000000140000000100
- 0400000000009001000000000000000000001000000000000000000000000000
- 8000008000000080800080000000800080008080000080808000C0C0C0000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
- 3333333333333333333333333333333333333333333333333333333333333333
- 3333333333333333333333333333333333333333333333333333333333333333
- 3333333333333333333333333333333333333333333333333333333333333333
- 33333333333333333333333FFFF3333FFFF33333330000333300003333333377
- 77FF337777FF33333033360330333603333F37F3377F37F3377F330330FFF303
- 30F3F303337337F3337F37F3337F303330FFF303303FF30337F337F3337FF7F3
- 337F3033303FF307703FF30337F337FFFF7777FFFF7F30330700003000000073
- 37F377777737777777733030733333333033073337F773333333373F77333707
- 3333333333003333377733333333337733333333333333333333333333333333
- 3333333333333333333333333333333333333333333333333333333333333333
- 3333333333333333333333333333333333333333333333333333333333333333
- 3333333333333333333333333333333333333333333333333333333333333333
- 33333333333333333333}
- Layout = blGlyphTop
- NumGlyphs = 2
- end
- object BitBtn5: TBitBtn
- Left = 88
- Top = 24
- Width = 73
- Height = 49
- Caption = '&Add'
- TabOrder = 4
- OnClick = BitBtn5Click
- Glyph.Data = {
- DE000000424DDE0000000000000076000000280000000D0000000D0000000100
- 0400000000006800000000000000000000001000000010000000000000000000
- BF0000BF000000BFBF00BF000000BF00BF00BFBF0000C0C0C000808080000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777777
- 700077777777777770007777700077777000777770C077777000777770C07777
- 7000770000C000077000770CCCCCCC077000770000C000077000777770C07777
- 7000777770C07777700077777000777770007777777777777000777777777777
- 7000}
- Layout = blGlyphTop
- end
- end
- object ListBox2: TListBox
- Left = 104
- Top = 108
- Width = 89
- Height = 209
- ItemHeight = 15
- TabOrder = 1
- end
- object Memo1: TMemo
- Left = 200
- Top = 88
- Width = 297
- Height = 229
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clBlack
- Font.Height = -12
- Font.Name = 'Terminal'
- Font.Style = []
- ParentFont = False
- ScrollBars = ssBoth
- TabOrder = 2
- end
- object ListBox1: TListBox
- Left = 8
- Top = 108
- Width = 89
- Height = 209
- ItemHeight = 15
- TabOrder = 3
- end
- object OpenDialog1: TOpenDialog
- Filter = 'Form Files (*.FRM)|*.FRM'
- Left = 446
- Top = 324
- end
- end
-